﻿Public Class TiecCuoi
    Dim _id, _ca, _soLuongBan, _soBanDuTru, _sanh As Integer
    Dim _tenChuRe, _tenCoDau, _dienThoai As String
    Dim _ngay As DateTime

    Dim _tienDatCoc As Double

    Public Property ID() As Integer
        Get
            Return _id
        End Get
        Set(ByVal value As Integer)
            _id = value
        End Set
    End Property

    Public Property Tên_Chú_Rễ() As String
        Get
            Return _tenChuRe
        End Get
        Set(ByVal value As String)
            _tenChuRe = value
        End Set
    End Property
    Public Property Tên_Cô_Dâu() As String
        Get
            Return _tenCoDau
        End Get
        Set(ByVal value As String)
            _tenCoDau = value
        End Set
    End Property
    Public Property Điện_Thoại() As String
        Get
            Return _dienThoai
        End Get
        Set(ByVal value As String)
            _dienThoai = value
        End Set
    End Property
    Public Property Ngày() As DateTime
        Get
            Return _ngay
        End Get
        Set(ByVal value As DateTime)
            _ngay = value
        End Set
    End Property
    Public Property Ca() As Integer
        Get
            Return _ca
        End Get
        Set(ByVal value As Integer)
            _ca = value
        End Set
    End Property
    Public Property Sảnh() As Integer
        Get
            Return _sanh
        End Get
        Set(ByVal value As Integer)
            _sanh = value
        End Set
    End Property
    Public Property Tiền_Đặt_Cọc() As Double
        Get
            Return _tienDatCoc
        End Get
        Set(ByVal value As Double)
            _tienDatCoc = value
        End Set
    End Property
    Public Property Số_Lượng_Bàn() As Integer
        Get
            Return _soLuongBan
        End Get
        Set(ByVal value As Integer)
            _soLuongBan = value
        End Set
    End Property
    Public Property Số_Bàn_Dự_Trữ() As Integer
        Get
            Return _soBanDuTru
        End Get
        Set(ByVal value As Integer)
            _soBanDuTru = value
        End Set
    End Property

    Public Sub New(ByVal id As Integer, ByVal tenChuRe As String, ByVal tenCoDau As String, ByVal dienThoai As String, ByVal ngay As DateTime, ByVal ca As Integer, ByVal sanh As Integer, ByVal tienDatCoc As Double, ByVal soLuongBan As Integer, ByVal soBanDuTru As Integer)
        _id = id
        _tenChuRe = tenChuRe
        _tenCoDau = tenCoDau
        _dienThoai = dienThoai
        _ngay = ngay
        _ca = ca
        _sanh = sanh
        _tienDatCoc = tienDatCoc
        _soLuongBan = soLuongBan
        _soBanDuTru = soBanDuTru
    End Sub
End Class
